home *** CD-ROM | disk | FTP | other *** search
/ Suzy B Software 2 / Suzy B Software CD-ROM 2 (1994).iso / stos / stos_85 / loara.bas (.txt) < prev    next >
Atari STOS Basic  |  1987-04-21  |  8KB  |  109 lines
  1. 10 KEY
  2. 100 LOCATE
  3. 1000 CENTRE
  4. 1010 PRINT
  5. 1020 PRINT
  6. 1030 PRINT
  7. 1040 PRINT
  8. 1050 PRINT
  9. 1060 PRINT
  10. 1070 LOCATE
  11. 1080 CLEAR KEY
  12. 110 FOR
  13. 120 UPDATE
  14. 130 GOSUB
  15. 140 CLEAR KEY
  16. 150 VARNAME
  17. 160 IF
  18. 170 CLW
  19. 180 REPEAT
  20. 190 CLW
  21. 20 DIM
  22. 200 IF
  23. 210 IF
  24. 220 IF
  25. 230 GOSUB
  26. 240 LOCATE
  27. 250 LOCATE
  28. 260 IF
  29. 270 LOCATE
  30. 280 FOR
  31. 290 CLW
  32. 30 PALETTE
  33. 300 CENTRE
  34. 310 PRINT
  35. 320 CENTRE
  36. 330 PRINT
  37. 340 PRINT
  38. 350 CLEAR KEY
  39. 360 REPEAT
  40. 370 VARNAME
  41. 380 VARNAME
  42. 390 REPEAT
  43. 40 WINDOPEN
  44. 400 UNTIL
  45. 410 VARNAME
  46. 420 VARNAME
  47. 430 VARNAME
  48. 440 IF
  49. 450 IF
  50. 460 LOCATE
  51. 470 LOCATE
  52. 480 LOCATE
  53. 490 IF
  54. 50 WINDOPEN
  55. 500 LOCATE
  56. 510 LOCATE
  57. 520 VARNAME
  58. 530 UNTIL
  59. 540 VARNAME
  60. 550 VARNAME
  61. 560 REPEAT
  62. 570 VARNAME
  63. 580 UNTIL
  64. 590 LOCATE
  65. 60 QWINDOW
  66. 600 IF
  67. 610 LOCATE
  68. 620 LOCATE
  69. 630 LOCATE
  70. 640 IF
  71. 650 WAIT
  72. 660 WINDOW
  73. 670 REPEAT
  74. 680 LOCATE
  75. 690 BELL
  76. 70 FOR
  77. 700 PAPER
  78. 710 IF
  79. 720 VARNAME
  80. 730 LOCATE
  81. 740 IF
  82. 750 LOCATE
  83. 760 SWAP
  84. 770 VARNAME
  85. 780 UNTIL
  86. 790 WINDOW
  87. 80 BOX
  88. 800 IF
  89. 810 IF
  90. 820 IF
  91. 830 IF
  92. 840 SPRITE
  93. 850 UPDATE
  94. 860 CLW
  95. 870 PRINT
  96. 880 PRINT
  97. 890 CENTRE
  98. 90 PEN
  99. 900 PRINT
  100. 910 PRINT
  101. 920 PRINT
  102. 930 CENTRE
  103. 940 PRINT
  104. 950 PRINT
  105. 960 PRINT
  106. 970 PRINT
  107. 980 PRINT
  108. 990 PRINT
  109.